home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / ACORNET / OLD-VERSIONS / UPG017-0 / !AnUpg019_!SLIPdial_Scripts_slipswitch_StackCtrl < prev    next >
Unknown  |  1995-11-14  |  3.4 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 34 f4 20 43 6f | 6e 74 72 6f 6c 20 73 74 |...4. Co|ntrol st|
|00000010| 61 72 74 69 6e 67 20 61 | 6e 64 20 73 74 6f 70 70 |arting a|nd stopp|
|00000020| 69 6e 67 20 6f 66 20 54 | 43 50 2f 49 50 20 73 74 |ing of T|CP/IP st|
|00000030| 61 63 6b 73 0d 00 14 2d | f4 20 43 61 6c 6c 65 64 |acks...-|. Called|
|00000040| 20 62 79 20 74 68 65 20 | 22 44 6f 49 74 41 6c 6c | by the |"DoItAll|
|00000050| 22 20 53 6c 69 70 44 69 | 61 6c 20 73 63 72 69 70 |" SlipDi|al scrip|
|00000060| 74 0d 00 15 12 f4 20 56 | 65 72 73 69 6f 6e 20 30 |t..... V|ersion 0|
|00000070| 2e 30 34 0d 00 1e 38 f4 | 20 28 63 29 20 52 69 63 |.04...8.| (c) Ric|
|00000080| 68 61 72 64 20 42 69 72 | 6b 65 74 74 20 3c 73 75 |hard Bir|kett <su|
|00000090| 70 70 6f 72 74 40 6d 75 | 73 69 63 62 6f 78 2e 64 |pport@mu|sicbox.d|
|000000a0| 65 6d 6f 6e 2e 63 6f 2e | 75 6b 3e 0d 00 28 04 0d |emon.co.|uk>..(..|
|000000b0| 00 32 3b f4 20 4e 6f 74 | 65 3a 20 74 68 69 73 20 |.2;. Not|e: this |
|000000c0| 70 72 6f 67 72 61 6d 20 | 69 73 20 2a 74 72 61 6e |program |is *tran|
|000000d0| 73 69 65 6e 74 2a 20 66 | 6f 72 20 65 61 63 68 20 |sient* f|or each |
|000000e0| 6f 70 65 72 61 74 69 6f | 6e 2e 0d 00 3c 04 0d 00 |operatio|n...<...|
|000000f0| 46 2a f4 20 45 6e 74 72 | 79 20 70 61 72 61 6d 65 |F*. Entr|y parame|
|00000100| 74 65 72 73 3a 20 20 3c | 73 74 61 63 6b 3e 20 3c |ters: <|stack> <|
|00000110| 63 6f 6d 6d 61 6e 64 3e | 0d 00 50 1f f4 20 73 74 |command>|..P.. st|
|00000120| 61 63 6b 3d 22 4b 41 39 | 51 22 20 6f 72 20 22 46 |ack="KA9|Q" or "F|
|00000130| 72 65 65 4e 65 74 22 0d | 00 5a 1c f4 20 63 6f 6d |reeNet".|.Z.. com|
|00000140| 6d 61 6e 64 20 63 61 6e | 20 62 65 20 6f 6e 65 20 |mand can| be one |
|00000150| 6f 66 3a 0d 00 64 45 f4 | 20 20 20 73 74 61 72 74 |of:..dE.| start|
|00000160| 20 20 20 20 20 20 53 74 | 61 72 74 20 75 70 20 74 | St|art up t|
|00000170| 68 65 20 73 74 61 63 6b | 20 69 66 20 6e 65 63 65 |he stack| if nece|
|00000180| 73 73 61 72 79 20 61 6e | 64 20 6d 61 6b 65 20 69 |ssary an|d make i|
|00000190| 74 20 61 63 74 69 76 65 | 0d 00 6e 3d f4 20 20 20 |t active|..n=. |
|000001a0| 6f 66 66 6c 69 6e 65 20 | 20 20 20 53 74 61 72 74 |offline | Start|
|000001b0| 20 75 70 20 74 68 65 20 | 73 74 61 63 6b 20 77 69 | up the |stack wi|
|000001c0| 74 68 20 27 6f 66 66 6c | 69 6e 65 27 20 73 65 74 |th 'offl|ine' set|
|000001d0| 74 69 6e 67 73 0d 00 6f | 3f f4 20 20 20 61 75 74 |tings..o|?. aut|
|000001e0| 6f 20 20 20 20 20 20 20 | 53 74 61 72 74 20 75 70 |o |Start up|
|000001f0| 20 74 68 65 20 73 74 61 | 63 6b 20 66 6f 72 20 61 | the sta|ck for a|
|00000200| 6e 20 75 6e 61 74 74 65 | 6e 64 65 64 20 73 65 73 |n unatte|nded ses|
|00000210| 73 69 6f 6e 0d 00 78 37 | f4 20 20 20 73 74 6f 70 |sion..x7|. stop|
|00000220| 20 20 20 20 20 20 20 53 | 74 6f 70 20 74 68 65 20 | S|top the |
|00000230| 73 74 61 63 6b 20 77 69 | 74 68 6f 75 74 20 64 69 |stack wi|thout di|
|00000240| 73 63 6f 6e 6e 65 63 74 | 69 6e 67 0d 00 82 30 f4 |sconnect|ing...0.|
|00000250| 20 20 20 73 68 75 74 64 | 6f 77 6e 20 20 20 44 69 | shutd|own Di|
|00000260| 73 63 6f 6e 6e 65 63 74 | 20 61 6e 64 20 73 74 6f |sconnect| and sto|
|00000270| 70 20 74 68 65 20 73 74 | 61 63 6b 0d 00 8c 46 f4 |p the st|ack...F.|
|00000280| 20 20 20 6c 69 6e 65 64 | 72 6f 70 20 20 20 54 68 | lined|rop Th|
|00000290| 65 20 6c 69 6e 65 20 2a | 68 61 73 2a 20 64 72 6f |e line *|has* dro|
|000002a0| 70 70 65 64 20 2d 20 64 | 6f 20 77 68 61 74 65 76 |pped - d|o whatev|
|000002b0| 65 72 20 69 73 20 61 70 | 70 72 6f 70 72 69 61 74 |er is ap|propriat|
|000002c0| 65 0d 00 96 04 0d 00 a0 | 33 e0 3d 26 63 30 30 30 |e.......|3.=&c000|
|000002d0| 3a 20 f4 20 57 65 20 64 | 6f 6e 27 74 20 6e 65 65 |: . We d|on't nee|
|000002e0| 64 20 61 6c 6c 20 6f 66 | 20 74 68 65 20 22 4e 65 |d all of| the "Ne|
|000002f0| 78 74 22 20 73 6c 6f 74 | 0d 00 aa 04 0d 00 b4 31 |xt" slot|.......1|
|00000300| de 20 71 25 26 34 30 30 | 2c 20 62 75 66 66 65 72 |. q%&400|, buffer|
|00000310| 25 26 31 30 30 2c 20 73 | 74 72 62 75 66 25 26 31 |%&100, s|trbuf%&1|
|00000320| 30 32 2c 20 6d 73 67 6c | 69 73 74 25 34 0d 00 be |02, msgl|ist%4...|
|00000330| 04 0d 00 c8 57 21 6d 73 | 67 6c 69 73 74 25 3d 30 |....W!ms|glist%=0|
|00000340| 3a 20 c8 99 20 22 57 69 | 6d 70 5f 49 6e 69 74 69 |: .. "Wi|mp_Initi|
|00000350| 61 6c 69 73 65 22 2c 33 | 31 30 2c 26 34 62 35 33 |alise",3|10,&4b53|
|00000360| 34 31 35 34 2c 22 53 74 | 61 63 6b 43 74 72 6c 22 |4154,"St|ackCtrl"|
|00000370| 2c 6d 73 67 6c 69 73 74 | 25 20 b8 20 6f 73 76 65 |,msglist|% . osve|
|00000380| 72 25 2c 74 61 73 6b 25 | 0d 00 d2 04 0d 00 dc 1b |r%,task%|........|
|00000390| c8 99 20 22 4f 53 5f 47 | 65 74 45 6e 76 22 20 b8 |.. "OS_G|etEnv" .|
|000003a0| 20 63 6c 69 6e 65 24 0d | 00 e6 0e f4 52 25 3d 46 | cline$.|....R%=F|
|000003b0| 4e 70 6f 6c 6c 0d 00 f0 | 04 0d 00 fa 25 f4 20 53 |Npoll...|....%. S|
|000003c0| 6b 69 70 20 74 68 65 20 | 22 62 61 73 69 63 20 2d |kip the |"basic -|
|000003d0| 71 75 69 74 20 66 69 6c | 65 6e 61 6d 65 22 0d 01 |quit fil|ename"..|
|000003e0| 04 3b 74 65 6d 70 24 3d | a4 67 65 74 6e 65 78 74 |.;temp$=|.getnext|
|000003f0| 61 72 67 3a 20 74 65 6d | 70 24 3d a4 67 65 74 6e |arg: tem|p$=.getn|
|00000400| 65 78 74 61 72 67 3a 20 | 74 65 6d 70 24 3d a4 67 |extarg: |temp$=.g|
|00000410| 65 74 6e 65 78 74 61 72 | 67 0d 01 0e 04 0d 01 18 |etnextar|g.......|
|00000420| 20 f4 20 47 65 74 20 74 | 68 65 20 70 61 72 61 6d | . Get t|he param|
|00000430| 65 74 65 72 73 20 77 65 | 20 77 61 6e 74 0d 01 22 |eters we| want.."|
|00000440| 2b 73 74 61 63 6b 24 20 | 3d 20 a4 67 65 74 6e 65 |+stack$ |= .getne|
|00000450| 78 74 61 72 67 20 20 20 | 3a 20 f2 6c 6f 77 65 72 |xtarg |: .lower|
|00000460| 28 73 74 61 63 6b 24 29 | 0d 01 2c 2d 63 6f 6d 6d |(stack$)|..,-comm|
|00000470| 61 6e 64 24 20 3d 20 a4 | 67 65 74 6e 65 78 74 61 |and$ = .|getnexta|
|00000480| 72 67 20 3a 20 f2 6c 6f | 77 65 72 28 63 6f 6d 6d |rg : .lo|wer(comm|
|00000490| 61 6e 64 24 29 0d 01 36 | 04 0d 01 40 0f c8 8e 20 |and$)..6|...@... |
|000004a0| 73 74 61 63 6b 24 20 ca | 0d 01 4a 04 0d 01 54 0d |stack$ .|..J...T.|
|000004b0| c9 20 22 6b 61 39 71 22 | 3a 0d 01 5e 20 20 20 73 |. "ka9q"|:..^ s|
|000004c0| 74 61 73 6b 25 3d a4 74 | 61 73 6b 68 61 6e 64 28 |task%=.t|askhand(|
|000004d0| 22 54 43 50 2f 49 50 22 | 29 0d 01 68 13 20 20 c8 |"TCP/IP"|)..h. .|
|000004e0| 8e 20 63 6f 6d 6d 61 6e | 64 24 20 ca 0d 01 72 10 |. comman|d$ ...r.|
|000004f0| 20 20 c9 20 22 73 74 61 | 72 74 22 3a 0d 01 7c 2d | . "sta|rt":..|-|
|00000500| 20 20 20 20 e7 20 73 74 | 61 73 6b 25 3d 30 20 f2 | . st|ask%=0 .|
|00000510| 74 61 73 6b 28 22 3c 54 | 43 50 49 50 32 24 44 69 |task("<T|CPIP2$Di|
|00000520| 72 3e 2e 21 52 75 6e 22 | 29 0d 01 86 12 20 20 c9 |r>.!Run"|).... .|
|00000530| 20 22 6f 66 66 6c 69 6e | 65 22 3a 0d 01 90 2f 20 | "offlin|e":.../ |
|00000540| 20 20 20 e7 20 73 74 61 | 73 6b 25 3d 30 20 f2 74 | . sta|sk%=0 .t|
|00000550| 61 73 6b 28 22 3c 54 43 | 50 49 50 32 24 44 69 72 |ask("<TC|PIP2$Dir|
|00000560| 3e 2e 21 52 75 6e 20 4f | 22 29 0d 01 91 0f 20 20 |>.!Run O|").... |
|00000570| c9 20 22 61 75 74 6f 22 | 3a 0d 01 92 2f 20 20 20 |. "auto"|:.../ |
|00000580| 20 e7 20 73 74 61 73 6b | 25 3d 30 20 f2 74 61 73 | . stask|%=0 .tas|
|00000590| 6b 28 22 3c 54 43 50 49 | 50 32 24 44 69 72 3e 2e |k("<TCPI|P2$Dir>.|
|000005a0| 21 52 75 6e 20 41 22 29 | 0d 01 9a 0f 20 20 c9 20 |!Run A")|.... . |
|000005b0| 22 73 74 6f 70 22 3a 0d | 01 a4 26 20 20 20 20 e7 |"stop":.|..& .|
|000005c0| 20 73 74 61 73 6b 25 20 | 8c 20 f2 6b 69 6c 6c 74 | stask% |. .killt|
|000005d0| 61 73 6b 28 73 74 61 73 | 6b 25 2c 30 29 0d 01 ae |ask(stas|k%,0)...|
|000005e0| 1e 20 20 c9 20 22 73 68 | 75 74 64 6f 77 6e 22 2c |. . "sh|utdown",|
|000005f0| 22 6c 69 6e 65 64 72 6f | 70 22 3a 0d 01 b8 26 20 |"linedro|p":...& |
|00000600| 20 20 20 e7 20 73 74 61 | 73 6b 25 20 8c 20 f2 6b | . sta|sk% . .k|
|00000610| 69 6c 6c 74 61 73 6b 28 | 73 74 61 73 6b 25 2c 31 |illtask(|stask%,1|
|00000620| 29 0d 01 d6 08 20 20 7f | 3a 0d 01 e0 21 20 20 20 |).... .|:...! |
|00000630| 20 f4 20 49 67 6e 6f 72 | 65 20 75 6e 6b 6e 6f 77 | . Ignor|e unknow|
|00000640| 6e 20 63 6f 6d 6d 61 6e | 64 73 0d 01 ea 07 20 20 |n comman|ds.... |
|00000650| cb 0d 01 f4 04 0d 01 f5 | 10 c9 20 22 66 72 65 65 |........|.. "free|
|00000660| 6e 65 74 22 3a 0d 01 fe | 22 20 20 73 74 61 73 6b |net":...|" stask|
|00000670| 25 3d a4 6d 6f 64 75 6c | 65 70 6f 73 28 22 46 72 |%=.modul|epos("Fr|
|00000680| 65 65 4e 65 74 22 29 0d | 02 08 13 20 20 c8 8e 20 |eeNet").|... .. |
|00000690| 63 6f 6d 6d 61 6e 64 24 | 20 ca 0d 02 12 21 20 20 |command$| ....! |
|000006a0| c9 20 22 73 74 61 72 74 | 22 2c 22 6f 66 66 6c 69 |. "start|","offli|
|000006b0| 6e 65 22 2c 22 61 75 74 | 6f 22 3a 0d 02 1c 34 20 |ne","aut|o":...4 |
|000006c0| 20 20 20 e7 20 73 74 61 | 73 6b 25 3d 30 20 8c 20 | . sta|sk%=0 . |
|000006d0| f2 74 61 73 6b 28 22 3c | 46 72 65 65 55 73 65 72 |.task("<|FreeUser|
|000006e0| 24 44 69 72 3e 2e 53 74 | 61 72 74 75 70 22 29 0d |$Dir>.St|artup").|
|000006f0| 02 26 1e 20 20 20 20 e7 | 20 63 6f 6d 6d 61 6e 64 |.&. .| command|
|00000700| 24 3d 22 6f 66 66 6c 69 | 6e 65 22 20 8c 0d 02 30 |$="offli|ne" ...0|
|00000710| 24 20 20 20 20 20 20 f2 | 74 61 73 6b 28 22 69 66 |$ .|task("if|
|00000720| 63 6f 6e 66 69 67 20 73 | 6c 30 20 64 6f 77 6e 22 |config s|l0 down"|
|00000730| 29 0d 02 3a 09 20 20 20 | 20 cc 0d 02 44 22 20 20 |)..:. | ...D" |
|00000740| 20 20 20 20 f2 74 61 73 | 6b 28 22 69 66 63 6f 6e | .tas|k("ifcon|
|00000750| 66 69 67 20 73 6c 30 20 | 75 70 22 29 0d 02 4e 09 |fig sl0 |up")..N.|
|00000760| 20 20 20 20 cd 0d 02 58 | 0f 20 20 c9 20 22 73 74 | ...X|. . "st|
|00000770| 6f 70 22 3a 0d 02 62 2b | 20 20 20 20 e7 20 73 74 |op":..b+| . st|
|00000780| 61 73 6b 25 20 f2 74 61 | 73 6b 28 22 69 66 63 6f |ask% .ta|sk("ifco|
|00000790| 6e 66 69 67 20 73 6c 30 | 20 64 6f 77 6e 22 29 0d |nfig sl0| down").|
|000007a0| 02 6c 1e 20 20 c9 20 22 | 73 68 75 74 64 6f 77 6e |.l. . "|shutdown|
|000007b0| 22 2c 22 6c 69 6e 65 64 | 72 6f 70 22 3a 0d 02 76 |","lined|rop":..v|
|000007c0| 31 20 20 20 20 e7 20 73 | 74 61 73 6b 25 20 f2 74 |1 . s|task% .t|
|000007d0| 61 73 6b 28 22 3c 46 72 | 65 65 55 73 65 72 24 44 |ask("<Fr|eeUser$D|
|000007e0| 69 72 3e 2e 53 68 75 74 | 64 6f 77 6e 22 29 0d 02 |ir>.Shut|down")..|
|000007f0| 94 08 20 20 7f 3a 0d 02 | 9e 21 20 20 20 20 f4 20 |.. .:..|.! . |
|00000800| 49 67 6e 6f 72 65 20 75 | 6e 6b 6e 6f 77 6e 20 63 |Ignore u|nknown c|
|00000810| 6f 6d 6d 61 6e 64 73 0d | 02 a8 07 20 20 cb 0d 02 |ommands.|... ...|
|00000820| b2 04 0d 02 b3 06 7f 3a | 0d 02 bc 1d 20 20 f4 20 |.......:|.... . |
|00000830| 49 67 6e 6f 72 65 20 75 | 6e 6b 6e 6f 77 6e 20 73 |Ignore u|nknown s|
|00000840| 74 61 63 6b 73 0d 02 c6 | 05 cb 0d 02 d0 05 e0 0d |tacks...|........|
|00000850| 02 da 04 0d 02 e4 12 dd | 20 f2 74 61 73 6b 28 74 |........| .task(t|
|00000860| 61 73 6b 24 29 0d 02 ee | 1d c8 99 20 22 57 69 6d |ask$)...|... "Wim|
|00000870| 70 5f 53 74 61 72 74 54 | 61 73 6b 22 2c 74 61 73 |p_StartT|ask",tas|
|00000880| 6b 24 0d 02 f8 05 e1 0d | 03 02 04 0d 03 0c 21 dd |k$......|......!.|
|00000890| 20 f2 6b 69 6c 6c 74 61 | 73 6b 28 68 61 6e 64 6c | .killta|sk(handl|
|000008a0| 65 25 2c 20 70 6f 6c 69 | 74 65 25 29 0d 03 16 0f |e%, poli|te%)....|
|000008b0| e7 20 70 6f 6c 69 74 65 | 25 20 8c 0d 03 20 44 20 |. polite|% ... D |
|000008c0| 20 f4 20 53 65 6e 64 20 | 50 72 65 51 75 69 74 20 | . Send |PreQuit |
|000008d0| 6d 65 73 73 61 67 65 20 | 2d 20 62 75 74 20 74 68 |message |- but th|
|000008e0| 65 6e 20 63 61 72 72 79 | 20 6f 6e 20 61 6e 64 20 |en carry| on and |
|000008f0| 71 75 69 74 20 72 65 67 | 61 72 64 6c 65 73 73 0d |quit reg|ardless.|
|00000900| 03 2a 40 20 20 21 71 25 | 3d 32 35 36 3a 71 25 21 |.*@ !q%|=256:q%!|
|00000910| 31 32 3d 30 3a 71 25 21 | 31 36 3d 38 3a c8 99 22 |12=0:q%!|16=8:.."|
|00000920| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|00000930| 22 2c 31 37 2c 71 25 2c | 68 61 6e 64 6c 65 25 0d |",17,q%,|handle%.|
|00000940| 03 34 05 cd 0d 03 3e 3e | 21 71 25 3d 32 35 36 3a |.4....>>|!q%=256:|
|00000950| 71 25 21 31 32 3d 30 3a | 71 25 21 31 36 3d 30 3a |q%!12=0:|q%!16=0:|
|00000960| c8 99 22 57 69 6d 70 5f | 53 65 6e 64 4d 65 73 73 |.."Wimp_|SendMess|
|00000970| 61 67 65 22 2c 31 37 2c | 71 25 2c 68 61 6e 64 6c |age",17,|q%,handl|
|00000980| 65 25 0d 03 48 05 e1 0d | 03 52 04 0d 03 5c 13 dd |e%..H...|.R...\..|
|00000990| 20 a4 74 61 73 6b 68 61 | 6e 64 28 41 24 29 0d 03 | .taskha|nd(A$)..|
|000009a0| 66 19 ea 20 41 25 2c 72 | 25 2c 6c 25 2c 68 25 2c |f.. A%,r|%,l%,h%,|
|000009b0| 70 74 72 25 2c 42 24 0d | 03 70 18 72 25 3d 30 3a |ptr%,B$.|.p.r%=0:|
|000009c0| 41 25 3d 30 3a f2 6c 6f | 77 65 72 28 41 24 29 0d |A%=0:.lo|wer(A$).|
|000009d0| 03 7a 05 f5 0d 03 84 3d | 20 20 c8 99 20 22 54 61 |.z.....=| .. "Ta|
|000009e0| 73 6b 4d 61 6e 61 67 65 | 72 5f 45 6e 75 6d 65 72 |skManage|r_Enumer|
|000009f0| 61 74 65 54 61 73 6b 73 | 22 2c 41 25 2c 62 75 66 |ateTasks|",A%,buf|
|00000a00| 66 65 72 25 2c 26 31 30 | 30 20 b8 20 41 25 2c 6c |fer%,&10|0 . A%,l|
|00000a10| 25 0d 03 8e 0c 20 20 70 | 74 72 25 3d 30 0d 03 98 |%.... p|tr%=0...|
|00000a20| 1f 20 20 c8 95 20 72 25 | 3d 30 20 80 20 62 75 66 |. .. r%|=0 . buf|
|00000a30| 66 65 72 25 2b 70 74 72 | 25 3c 6c 25 0d 03 a2 3d |fer%+ptr|%<l%...=|
|00000a40| 20 20 20 20 68 25 3d 62 | 75 66 66 65 72 25 21 70 | h%=b|uffer%!p|
|00000a50| 74 72 25 3a 20 42 24 3d | a4 73 74 72 30 28 62 75 |tr%: B$=|.str0(bu|
|00000a60| 66 66 65 72 25 21 28 70 | 74 72 25 2b 34 29 29 3a |ffer%!(p|tr%+4)):|
|00000a70| 20 70 74 72 25 2b 3d 31 | 36 0d 03 ac 22 20 20 20 | ptr%+=1|6..." |
|00000a80| 20 f2 6c 6f 77 65 72 28 | 42 24 29 3a 20 e7 41 24 | .lower(|B$): .A$|
|00000a90| 3d 42 24 20 8c 20 72 25 | 3d 68 25 0d 03 b6 07 20 |=B$ . r%|=h%.... |
|00000aa0| 20 ce 0d 03 c0 12 fd 20 | 41 25 3c 30 20 84 20 72 | ...... |A%<0 . r|
|00000ab0| 25 3c 3e 30 0d 03 ca 07 | 3d 72 25 0d 03 d4 04 0d |%<>0....|=r%.....|
|00000ac0| 03 de 14 dd 20 a4 6d 6f | 64 75 6c 65 70 6f 73 28 |.... .mo|dulepos(|
|00000ad0| 41 24 29 0d 03 e8 31 ea | 20 46 25 2c 6c 6f 63 25 |A$)...1.| F%,loc%|
|00000ae0| 3a 20 c8 99 20 22 58 4f | 53 5f 4d 6f 64 75 6c 65 |: .. "XO|S_Module|
|00000af0| 22 2c 31 38 2c 41 24 20 | b8 20 2c 2c 2c 6c 6f 63 |",18,A$ |. ,,,loc|
|00000b00| 25 3b 46 25 0d 03 f2 17 | e7 20 46 25 80 31 20 8c |%;F%....|. F%.1 .|
|00000b10| 20 3d 30 20 8b 20 3d 6c | 6f 63 25 0d 03 fc 04 0d | =0 . =l|oc%.....|
|00000b20| 04 06 11 dd 20 a4 73 74 | 72 30 28 70 74 72 25 29 |.... .st|r0(ptr%)|
|00000b30| 0d 04 10 18 ea 20 70 25 | 2c 66 6f 75 6e 64 25 3a |..... p%|,found%:|
|00000b40| 66 6f 75 6e 64 25 3d a3 | 0d 04 1a 0e e3 20 70 25 |found%=.|..... p%|
|00000b50| 3d 30 b8 32 35 35 0d 04 | 24 18 20 20 73 74 72 62 |=0.255..|$. strb|
|00000b60| 75 66 25 3f 70 25 3d 70 | 74 72 25 3f 70 25 0d 04 |uf%?p%=p|tr%?p%..|
|00000b70| 2e 34 20 20 e7 20 73 74 | 72 62 75 66 25 3f 70 25 |.4 . st|rbuf%?p%|
|00000b80| 3d 30 20 8c 20 73 74 72 | 62 75 66 25 3f 70 25 3d |=0 . str|buf%?p%=|
|00000b90| 31 33 3a 70 25 3d 32 35 | 35 3a 66 6f 75 6e 64 25 |13:p%=25|5:found%|
|00000ba0| 3d b9 0d 04 38 05 ed 0d | 04 42 1e e7 20 66 6f 75 |=...8...|.B.. fou|
|00000bb0| 6e 64 25 20 8c 20 3d 24 | 73 74 72 62 75 66 25 20 |nd% . =$|strbuf% |
|00000bc0| 8b 20 3d 22 22 0d 04 4c | 04 0d 04 56 3f dd 20 a4 |. =""..L|...V?. .|
|00000bd0| 70 6f 6c 6c 3a 20 3d 30 | 3a ea 20 52 25 3a c8 99 |poll: =0|:. R%:..|
|00000be0| 20 22 57 69 6d 70 5f 50 | 6f 6c 6c 49 64 6c 65 22 | "Wimp_P|ollIdle"|
|00000bf0| 2c 26 31 30 65 33 39 37 | 32 2c 71 25 2c 30 20 b8 |,&10e397|2,q%,0 .|
|00000c00| 20 52 25 3a 20 3d 52 25 | 0d 04 60 04 0d 04 6a 11 | R%: =R%|..`...j.|
|00000c10| dd 20 a4 67 65 74 6e 65 | 78 74 61 72 67 0d 04 74 |. .getne|xtarg..t|
|00000c20| 11 ea 20 69 25 2c 63 68 | 24 2c 61 72 67 24 0d 04 |.. i%,ch|$,arg$..|
|00000c30| 7e 0a 69 25 20 3d 20 31 | 0d 04 88 0b 61 72 67 24 |~.i% = 1|....arg$|
|00000c40| 3d 22 22 0d 04 92 05 f5 | 0d 04 9c 19 20 20 63 68 |="".....|.... ch|
|00000c50| 24 20 3d 20 c1 63 6c 69 | 6e 65 24 2c 69 25 2c 31 |$ = .cli|ne$,i%,1|
|00000c60| 29 0d 04 a6 24 20 20 e7 | 20 28 63 68 24 20 3c 3e |)...$ .| (ch$ <>|
|00000c70| 20 22 22 29 20 80 20 28 | 63 68 24 20 3c 3e 20 22 | "") . (|ch$ <> "|
|00000c80| 20 22 29 20 8c 0d 04 b0 | 13 20 20 20 20 61 72 67 | ") ....|. arg|
|00000c90| 24 20 2b 3d 20 63 68 24 | 0d 04 ba 07 20 20 cd 0d |$ += ch$|.... ..|
|00000ca0| 04 c4 0d 20 20 69 25 20 | 2b 3d 20 31 0d 04 ce 1e |... i% |+= 1....|
|00000cb0| fd 20 28 63 68 24 20 3d | 20 22 22 29 20 84 20 28 |. (ch$ =| "") . (|
|00000cc0| 63 68 24 20 3d 20 22 20 | 22 29 0d 04 d8 29 63 6c |ch$ = " |")...)cl|
|00000cd0| 69 6e 65 24 20 3d 20 c2 | 63 6c 69 6e 65 24 2c 20 |ine$ = .|cline$, |
|00000ce0| a9 28 63 6c 69 6e 65 24 | 29 20 2d 20 28 69 25 2d |.(cline$|) - (i%-|
|00000cf0| 31 29 29 0d 04 e2 0a 3d | 20 61 72 67 24 0d 04 ec |1))....=| arg$...|
|00000d00| 04 0d 04 f6 12 dd 20 f2 | 6c 6f 77 65 72 28 f8 20 |...... .|lower(. |
|00000d10| 61 24 29 0d 05 00 0b ea | 20 4c 25 2c 63 25 0d 05 |a$).....| L%,c%..|
|00000d20| 0a 1c e3 20 4c 25 3d 31 | b8 a9 61 24 3a 63 25 3d |... L%=1|..a$:c%=|
|00000d30| 97 c1 61 24 2c 4c 25 2c | 31 29 0d 05 14 23 e7 63 |..a$,L%,|1)...#.c|
|00000d40| 25 3e 36 34 80 63 25 3c | 39 31 8c c1 61 24 2c 4c |%>64.c%<|91..a$,L|
|00000d50| 25 2c 31 29 3d bd 28 63 | 25 2b 33 32 29 0d 05 1e |%,1)=.(c|%+32)...|
|00000d60| 05 ed 0d 05 28 05 e1 0d | ff |....(...|. |
+--------+-------------------------+-------------------------+--------+--------+